home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1996 February: Tool Chest / Apple Developer CD Series Tool Chest February 1996 (Apple Computer)(1996).iso / Tool Chest / Interfaces & Libraries / Interfaces / AIncludes / Folders.a < prev    next >
Encoding:
Text File  |  1993-11-30  |  1.6 KB  |  41 lines  |  [TEXT/MPS ]
  1. ;    File:        Folders.a
  2. ;
  3. ;    Copyright:    © 1983-1993 by Apple Computer, Inc.
  4. ;                All rights reserved.
  5. ;
  6. ;    Version:    System 7.1 for ETO #11
  7. ;    Created:    Tuesday, March 30, 1993 18:00
  8. ;
  9. ;___________________________________________________________________________
  10.  
  11.     IF &TYPE('__INCLUDINGFOLDERS__') = 'UNDEFINED' THEN
  12. __INCLUDINGFOLDERS__    SET    1
  13.  
  14. kOnSystemDisk             EQU         $8000
  15.  
  16. kCreateFolder             EQU         1                 ; true- create a folder or not
  17. kDontCreateFolder         EQU         0                 ; false
  18.  
  19. kSystemFolderType         EQU         'macs'            ; the system folder
  20. kDesktopFolderType         EQU            'desk'            ; the desktop folder; objects in this folder show on the desktop
  21. kTrashFolderType          EQU         'trsh'            ; the trash folder; objects in this folder show up in the trash
  22. kWhereToEmptyTrashFolderType EQU     'empt'             ; the “empty trash” folder; Finder starts emptying from here down
  23.  
  24. kPrintMonitorDocsFolderType  EQU     'prnt'            ; Print Monitor documents
  25.  
  26. kStartupFolderType         EQU            'strt'            ; Finder objects (applications, documents, DAs, aliases to …) to open at startup go here
  27. kAppleMenuFolderType     EQU          'amnu'            ; Finder objects to put into the Apple menu go here
  28. kControlPanelFolderType EQU            'ctrl'            ; Control Panels go here (may contain INITs)
  29. kExtensionFolderType     EQU          'extn'            ; Finder extensions go here
  30. kFontsFolderType        EQU            'font'            ; Fonts go here.
  31.  
  32. kPreferencesFolderType    EQU            'pref'            ; preferences for applications go here
  33. kTemporaryFolderType     EQU          'temp'            ; temporary files go here (deleted periodically, but don’t rely on it)
  34.  
  35.                   macro
  36.                   _FindFolder
  37.                   moveq       #0,d0
  38.                   dc.w        $A823
  39.                   endm
  40.  
  41.     ENDIF    ; ...already included